home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #5 / Amiga Plus CD - 1996 - No. 5.iso / pd / grafik / adpro_scripts / operators / max_dynamic_range_ < prev    next >
Text File  |  1996-04-23  |  603b  |  29 lines

  1. /* $VER: Max_Dynamic_Range_ 1.04 (23.4.95)© Felix C. Coronado
  2. */
  3. ADDRESS "ADPro"
  4. OPTIONS RESULTS
  5. NL='0A'x
  6. IMAGE_TYPE
  7. IF ADPro_Result='BITPLANE' THEN DO
  8.  ADPRO_TO_FRONT
  9.  OKAY1 "Oops!"||NL||,
  10.        "There is no 8 or 24 bit" ||NL||,
  11.        "data to operate upon." ||NL||,
  12.        "Try loading"||NL||,
  13.        "data from disk."
  14.  EXIT
  15. END
  16. OFORMAT
  17. OldOperator=ADPro_Result
  18. OPERATOR "DYNAMIC_RANGE" 0 255
  19. IF rc=10 THEN DO
  20.  ADPRO_TO_FRONT
  21.  OKAY1 'Dynamic_Range failed'
  22. END
  23. OFORMAT OldOperator
  24. IF rc=10 THEN DO
  25.  ADPRO_TO_FRONT
  26.  OKAY1 'Error: Operator not found'||NL||,
  27.        '"Operators2/'||OldOperator||'"'
  28. END
  29.